Public Class CSaleBills



    Private _dblAmount As Double = 0
    Private _dblTotalTax As Double = 0
    Private _dblDiscount As Double = 0
    Private _dblExtDiscount As Double = 0
    Private _dblGrossAmt As Double = 0
    Private _dblPaidAmt As Double = 0

    Private _dblCreditAmt As Double = 0
    Private _dblDebitAmt As Double = 0
    Private _intBillID As Integer


    Public Property Amount() As Double
        Get
            Return _dblAmount
        End Get
        Set(ByVal value As Double)
            _dblAmount = value
        End Set
    End Property

    Public Property TotalTax() As Double
        Get
            Return _dblTotalTax
        End Get
        Set(ByVal value As Double)
            _dblTotalTax = value
        End Set
    End Property

    Public Property Discount() As Double
        Get
            Return _dblExtDiscount
        End Get
        Set(ByVal value As Double)
            _dblExtDiscount = value
        End Set
    End Property

    Public Property NewDiscount() As Double
        Get
            Return _dblDiscount
        End Get
        Set(ByVal value As Double)
            _dblDiscount = value
        End Set
    End Property
    Public Property GrossAmt() As Double
        Get
            Return _dblGrossAmt
        End Get
        Set(ByVal value As Double)
            _dblGrossAmt = value
        End Set
    End Property

    Public Property PaidAmt() As Double
        Get
            Return _dblPaidAmt
        End Get
        Set(ByVal value As Double)
            _dblPaidAmt = value
        End Set
    End Property

    Public Property CreditAmt() As Double
        Get
            Return _dblCreditAmt
        End Get
        Set(ByVal value As Double)
            _dblCreditAmt = value
        End Set
    End Property

    Public Property DebitAmt() As Double
        Get
            Return _dblDebitAmt
        End Get
        Set(ByVal value As Double)
            _dblDebitAmt = value
        End Set
    End Property

    Public Property SaleBillID() As Integer
        Get
            Return _intBillID
        End Get
        Set(ByVal value As Integer)
            _intBillID = value
        End Set
    End Property


End Class
